ctl_path = ""
output_folder = ""
tdef = 18
ztef = 11

it=1
iz=1

while(it <= tdef)
    while(iz <= zdef)
        'reinit'
        'open 'ctl_path
        'set gxout barb'
        'd Uprs*2.5;Vprs*2.5'
        'gxprint 'output_folder'/wind_z'iz'_t'it'.png'
    endwhile
    iz = 1
endwhile
